我想做个EXCEL的VBA,详细要求如下:用VBA代替一个数据公式答:Private Sub iCul(c As Range, Optional SL As Boolean = False)'SL:true为面积,false为周长 Dim a, d, dL, i, Fz, s, s1$, sa, tmp Fz = Split("=,+,*,(,)", ",")s = c.Text With Worksheets("Sheet2")a = .Range("A2:C" & .Cells(65536, 1).End(xlUp).Row)En...